﻿Public Class ClsIndustryAccount
    'S_IndustryAccount

    Private mInnerId As Integer
    Private mIndustryId As Int16
    Private mAcctLevel As Int16
    Private mParentAcctCode As String
    Private mAcctCode As String
    Private mAcctName As String
    Private mAcctType As String
    Private mDebitCredit As Int16
    Private mIfLastAcct As Boolean

    Public Property InnerId As Integer
        Get
            Return mInnerId
        End Get
        Set(value As Integer)
            mInnerId = value
        End Set
    End Property

    Public Property IndustryId As Short
        Get
            Return mIndustryId
        End Get
        Set(value As Short)
            mIndustryId = value
        End Set
    End Property

    Public Property AcctLevel As Short
        Get
            Return mAcctLevel
        End Get
        Set(value As Short)
            mAcctLevel = value
        End Set
    End Property

    Public Property ParentAcctCode As String
        Get
            Return mParentAcctCode
        End Get
        Set(value As String)
            mParentAcctCode = value
        End Set
    End Property

    Public Property AcctCode As String
        Get
            Return mAcctCode
        End Get
        Set(value As String)
            mAcctCode = value
        End Set
    End Property

    Public Property AcctName As String
        Get
            Return mAcctName
        End Get
        Set(value As String)
            mAcctName = value
        End Set
    End Property

    Public Property AcctType As String
        Get
            Return mAcctType
        End Get
        Set(value As String)
            mAcctType = value
        End Set
    End Property

    Public Property DebitCredit As Short
        Get
            Return mDebitCredit
        End Get
        Set(value As Short)
            mDebitCredit = value
        End Set
    End Property

    Public Property IfLastAcct As Boolean
        Get
            Return mIfLastAcct
        End Get
        Set(value As Boolean)
            mIfLastAcct = value
        End Set
    End Property
End Class
